sub msxgfx9kscreen(tscm6 as ubyte,tscm7 as ubyte):
  '- this code seems not acuraced yet
  out $64,6
  out $63,tscm6
  out $64,7
  out $63,tscm7
  out $67,1
  end sub
